1 CLS:PRINT@P,"=->";@X+991,"<↑>";:X=X-(PEEK(14400)=32)*(X>-15)+(PEEK(14400)=64)*(X<15):P=P+1:IFP>955THENPRINT:PRINT"L'APPAREIL A ATTERIT VOUS PERDEZ!!!...":PRINT"POUR REJOUER TAPEZ 'RUN'":END:ELSEIFT=1THEN2ELSEIFPEEK(14400)=128THENT=1:XX=X+928:GOTO2ELSE1
2 XX=XX-64:PRINT@XX,"*";:IFXX>=PANDXX<=P+2THENFORT=1TO5:PRINT@P-1,"TOUCHE";:FORU=1TO100:NEXT:PRINT@P-1,"      ";:FORU=1TO100:NEXT:NEXT:RUN:ELSEIFXX<64THENT=0:GOTO1ELSEGOTO1